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PURPOSE 









X-RAY is designed to aid the user in preparation, execution, and debug- 
ging of programs. 

USAGE 



X-RAY is entered by starting execution at location 40 , . X-RAY consists 
of a group of subroutines which process operator directives. Each direc- 
tive is defined separately in the following sections; however, below is a 
list of characteristics common to all directives: 

1. Directives are always two characters in length; i. e. DA,AL, etc. 

2. Directives are received through logical unit SYIN (the system input 
unit) by the I/O Monitor system; therefore, all directives must be 
preceded by a line feed and followed by a carriage return j e e 
L/FALC/R » -s" 

3. All directive arguments are hexadecimal. 

4. Leading zeroes need not be typed. Only the last 4 hex digits of any 
argument are used as input. 

5. If the operator makes a mistake and types in something other than 
a legal directive, two question marks will be typed out (? ?) and 
device SYIN selected for another input. 

DIRECTIVES 



Punch 



L 



o- 



The punch directive outputs onto paper tape the contents of a series of 
consecutive memory locations. The directive input format is: 
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PANNNN, XXXX 

where: NNNN is the beginning memory location, inclusive 

XXXX is one greater than the last location punched 

A is a space 

The space following the P is necessary since each X-RAY directive must 
be two characters in length. 

The punch directive produces a tape format exactly like that output by an 
absolute assembly, except no program checksumi is output by punch. See 
the SYM I/PREP reference manual for the paper tape format. 

After the punch directive has been input and the carriage return hit, the 
computer will come to a halt, allowing the operator to turn the paper 
tape punch on. When this has been done, the run button should be pushed 
to continue with the punch operation. When the operation is complete, 
the SYIN unit will be selected for another directive. Below is an example 
to punch cells 300 , through 3FF ,. 



P 300,400 



Absolute Load 



The absolute load directive loads an absolute program from paper tape 
into memory. The directive input format is as follows; 

AL 

The binary tape format consists of two standard records input from log- 
ical unit BIN (the binary input unit). The program load location is read 
from record 1. Record 2 is absolute program text, which is read into 
miemory beginning at load location. Absolute load does not check the 
checksum; however, the checksum is read into the first cell following 
the program. 

If BIN is assigned to the teletype, the paper tape reader must be turned 
on manually. This should be done after the absolute load directive has 
been typed. After the program has been loaded, the computer will conne 
to a halt, allowing the operator to turn off the reader. When the run 
button is pushed, the SYIN unit will be selected for another directive. 
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Dump 



£' 



The dump directive prints the contents of an area of memory. The 
directive input format is as follows: 

DANNNN.XXXX 

where: NNNN is the beginning memory location, inclusive 

XXXX is the ending memory location, inclusive 

A is a. space 

The dump directive produces a tabulation on the system logical list unit 
(LIST). Each line consists of an address A, and the contents, in hex- 
adecimal, of locations A through A+7. A complete line is always out- 
put. Below is an example of a dump beginning at location 300 ,. 



D 300, 


310 
















0300 


0000 


90D6 


7804 


80D6 


22E7 


90D6 


8800 


E381 


0308 


7800 


8806 


0800 


130F 


903E 


OOBO 


2800 


803E 


0310 


9806 


OOBO 


2800 


903E 


9800 


1303 


731D 


631E 



The DUMP subroutine also provides the user with a dynamic dump 
capability. The dump output format is exactly as described above, but 
the dump subroutine which is resident in X-RAY is called from the users 
program. The calling sequence is as follows: 

JSX DUMP 
DATA NNNN 
DATA XXXX 



The program sequence causes the contents of memory location NNNN 
through XXXX to output on LIST. The users program then continues 
execution following the DUMP calling sequence. I/O Monitor cell 56 
is the linkage to DUMP. The user must equivalence DUMP to cell 
56., in his program. For more details see the I/O Monitor documen- 
tation. 



16 



Hex Correction 



The hex correction directive stores different hex numbers into consecu- 
tive memory cells. 
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The directive input format is as follows: 

HANNNN, XXXX, YYYY, ZZZZ, 



where: NNNN is the beginning location 

XXXX is data to be stored 
YYYY is data to be stored 
ZZZZ is data to be stored 
etc. 

A is a space 

XXXX is stored into location NNNN, YYYY is stored into location 
NNNN+1, etc. When NNNN is negative (a hex number from 8000 to 
FFFF) the program will begin storing the new data in the location 
following the last data word in the previous H directive. The directive 
cannot be longer than 54 characters, including the H, spaces, and 
commas. Below is an example of a 53 character input to store data 
starting at cell 400 ,. The input character count starts with the H 
and ends with the last number typed. 

H400, 1.2,3,4,5,6,7,8,9.10,11,12,13,14,15,16,17,18.19 

Blank Buffer 

The blank buffer directive stores a single data value into an area of 
memory. The input format is as follows: 

BBNNNN. XXXX. YYYY 



where: 



NNNN is the beginning memory location 

XXXX is the data to be stored 

YYYY is the number of times to store the data 



Below is an example to store 0003 into 100^, cells beginning at location 
300, 



16' 



Date 



BB300.3.100 



v^''"-^ 



u 



The date directive stores the 8 characters following 'DA' into the 
monitor date locations. See the monitor documentation for the exact 
location of DATE. The directive format is as follows: 

DAXXXXXXXX 



BLD - Continued Page 5 

where: X's will be stored into cells DATE through DATE+3 

Below is an example to store 11/28/67 into DATE to DATE+3: 

DAI 1/28/67 

Identification 

The identification directive stores the first 8 characters following 'ID* 
into the monitor program name locations. The directive input format 
is as follows: 

IDXXXXXXXX 
where: X's will be stored in NAME to NAME+3 

Below is an example to store COMP PRO into cells NAME to NAME+3: 

IDCOMP PROG 

Transfer 

The transfer directive transfers execution to a location in memory. 
The directive input format is as follows: 

TAXXXX 
where: XXXX is the location to begin execution 

Ais a space 
Below is an example to start execution at cell 300 .: 

T 300 

Reassign I/O Device 

The I/O directive reassigns devices in the Peripheral Equipment 
Assignment Table (PEAT). (See I/O Monitor documentation). The 
directive input format is as follows: 

lOXX, YY 

where: XX is the first Logical Unit Number (LUN) 

YY is the second Logical Unit Number 
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XX must always be less than 12. . The I/O directive assigns XX to YY, 
Below is an example assigning tUN #2 to the same device as LUN #12: 

I02,12 

RELOCATABLE LOADER DIRECTIVES 



The following three directives (IL, CL, and ET) can be used only when 
the relocating loader is in memory. 

Initialize Load 

This directive is used to begin a relocatable loading operation. The 
directive input format is as follows: 

IL 

There are no input arguments for IL. 

The operator places the text to be loaded in the BIN device, types the 
directive IL, and then turns the reader on. The loader clears the entry 
name table, resets the storage map and loads the text. As entry names 
are encountered in loading they are placed into the entry names table. 
Loading ceases when an END statement is detected in the text. If sense 
switch is true the loader will load another program from BIN. If 
sense switch is false control will be returned to X-RAY for further 
directives. 

Continue Load 



This directive is used to continue loading relocatable programs without 
destroying the entry names table or programs already loaded. 

The directive input format is as follows: 

CL 

There are no input arguments for CL. 

The operation and functions of the CL directive are identical to those of 
the IL directive with the exceptions that the entry names table is not 
cleared and the storage map is not reset. 



• 
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Entry Names Table Printout (Storage Map) 

This directive is used to print the contents of the entry names table which 
has been generated by the loading of programs. 

The input format is as follows: 

ET 

There are no input arguments for ET. 

Each entry name which has been encountered since the last IL directive 
will be listed along with its location in core. 

Undefined names will be given a location of zero. Names referenced only 
by a LOAD pseudo-op but not loaded will be printed with a location value 
of 3FFF and flagged by an arrow. 

If a name is defined more than once the location value of the first en- 
counter will be used to fill all references to that name. All subsequent 
definitions of that name will be printed, with their locations, but flagged 
by an arrow. 

The Directive ET is also used to initiate execution of the Symbolic 
Program Editor and the Trace package. The use of the directive is 
determined by which program (Loader, Editor, or Trace) has been 
loaded. 

For the alternative uses of the ET directive refer to the respective 
manusl for the Editor or Trace. 

Notes 



X-RAY is coded for the 703 computer using the SYM II Assembler. The 
package is located after the I/O Monitor in memory block 0. See the 
attached listing for the exact beginning location of X-RAY. X-RAY may 
be overlay ed by a program and not affect the I/O Monitor. 
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The subroutines 

1. XRAY 

2. lORE 

3. DATR 

4. ID 

5. DUMP 

6. DMP 

7. UNPK 

8. S. TRANS - 

9. PXCH 

10. HX 

11. BB 

12. S.FILL 

13. S.PACK - 



that make up X-RAY are listed below: 
main control program, 
processes the lO directive, 
processes the DA directive, 
processes the ID directive, 
processes the D directive, 
processes a dump call from a program, 
unpacks teletype input arguments, 
processes the T directive, 
processes the P directive. 
i processes the H directive, 
processes the BB directive, 
processes the AL directive, 
converts data from binary to ASCII characters. 
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SUBROUTINE 



TITLE: X-RAY Main Control Program 

LABEL: XRAY 



PURPOSE 

XRAY is the main control program for BASIC X-RAY EXEC. It receives 
directives from the teletype and branches to the appropriate directive ser- 
vice routines. 

USAGE 

XRAY is entered by starting execution at location 40 ,. The teletype is 
selected for input and the program waits for a directive to be typed. If 
the directive cannot be found in the array of legal directives, XRAY types 
two question marks {? ?) and selects the teletype for another directive. 

RESTRICTIONS 

XRAY is written for the 703 computer, using SYM II assembly language. 

Subroutines used are listed below: 

1. lORE 6. PXCH 

2. DATR 7. HX 

3. ID 8. BB 

4. DUMP 9. S.FILL 

5. S. TRANS 

Cells 2045, 2046, and 2047 are used as linkage to the relocating loader 
directives IL, CL, and ET, 





SUBROUTINE X-RAY Pa-eio 




( ENTRY j 




' 






OPEN FILE AND 






SELECT LUN SYIN 








FOR A DIRECTIVE 














1 






^.^ DIR ~"- . 
<^ TYPED ^' 


NO 












-^ Mi^^ 






n^" 






LOAD DIRECTIVE ; 




FROM WORD 1 






OF BUFFER 

1 






LOAD XR WITH 








COUNT OF 








DIRECTIVES 








1 

I* 


1 






COMPARE AC WITH 






DIRECTIVE ARRAY 










YES 


1 














NO 










DECREMENT XR 












<C '^XR HEG "^ 


NO 














„YES 






OUTPUT TWO 








QUESTION MARKS 

1 






I 


' * 




LOAD ADDRESS OF 






SERVICE SUB- 






ROUTINE AND 






TRANSFER 






Q END ^^ 
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SUBROUTINE 



TITLE: Reassign I/O Device 

LABEL: lORE 



PURPOSE 

lORE is a BASIC X-RAY EXEC subroutine that reassigns devices in the 
Peripheral Equipment Assignment Table (PEAT). 

USAGE 

lORE is called by the main control program XRAY. The I/O directive 
assigns XX to YY, the directive input format being lOXX, YY. 

RESTRICTIONS 

lORE is written for the 703 computer using SYM II assembly language. 
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SUBROUTINE 



TITLE: Date and Program Identification 

LABEL: DATR and ID 



PURPOSE 

Subroutines DATR and ID are BASIC X-RAY EXEC subroutines used to 
process the DA and ID directives. 

USAGE 



DATR is called by the main control program XRAY to miove the typed-in 

date to the I/O Monitor cells for the date, 5D, , through 60, ,. 

16 " 16 

ID is called by the main control program XRAY to miove the typed-in 
program identification to the I/O Monitor cells for the program name, 
61. . through 64 ,. 

DATR and ID return to XRAY after the information has been moved. 

RESTRICTIONS 

DATR and ID are written for the 703 computer using SYM II assembly 
language. Both subroutines take the first 8 characters following the 
input directive as the date or identification. Any excess input information 
is ignored. 



SUBROUTINE lORE 



Page 1 3 



UNPACK 
ARGUMENTS 
JSX. UNPK 



n 



LOAD FIRST 
LOGICAL UNIT 




COMPUTE PEAT 
ADDRESS 



T 
J 



SET NEW ASSIGN- 
MENT 




NO 



ignoreX 

,' CALL \ 

', JUMP I 

\^ X-RAY / 



SUBROUTINE DATR AND ID 
DATR 



SET ADDRESS IN ID 
TO MOVE DATE 



ID 



LOAD XR TO MOVE 
4 WORDS 



r 



MOVE A WORD 
FROM BUF TO 
NAME OR DATE 




RESET CELL IDC 
TO MOVE TO ID 
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SUBROUTINE 



TITLE: Memory Dunnp 

LABEL: DUMP 



PURPOSE 



DUMP is a BASIC X-RAY EXEC subroutine that prints a section of 
memory on the teletype. 

USAGE 

DUMP is called by the main control program XRAY to service the D 
directive. There are two arguments; LOCI and LOC2. LOCI the 
initial memory location to print and U5C2 is the last. DUMP returns 
to XRAY after the output is complete. 

DUMP has an entry point and can be called by a user program through 
this cell which is linked to I/O monitor cell 56^^. The calling sequence 
is shown below: 

JSX DUMP 

DATA LOCI 

DATA LOC2 

LOCI and LOC2 are locations as defined above. The user program con- 
tinues after the dump has been completed. 

RESTRICTIONS 

DUMP is written for the 703 computer using SYM U assembly language. 

Subroutine UNPK is used to convert LOCI and LOC2. 







DMP 


SUBROUTINE DMP 






P«g« >s 




MOVE ARGUMENTS 
TO DUMP SUB- 
ROUTINE LOCATIO 






i 






SAVE RETURN 
















DUMP 








UNPACK ARGUMENTS 
JSX UNPK 








" 










) 




OUTPUT UNE 
JSX DOIO 












> 
OPEN FIOT FOR OUT- 
PUT ON LUN LIST 






♦ 






LOAD NO LOCATIONS 
TO OUTPUT 














. 








w 






<l 






INITS.NEXTW+1 AND 
SET LOC INTO LINE 
BUF - J MP S.PAK 






SUBTRACT 8 FOR 
THE OUTPUT LINE 








1 
_ ^ 














* 




YES 








SAVE XR COUNTER 




C DO MORE ^» 








S.NEXTW II 


^^^^-^.^^ 




CONVERT WORD 
TO PRINTABLE 
CHARACTERS 




1 NO 






RETURN 






V 












MOVE CHARS INTO 
LINE OUTPUT 
BUFFER 3. BUFF 






. 11 






SET IN A 
BLANK WORD 






1 






INCREMENT MEMORY 
\DDRESS S.NEXTW+1 




NO 


•"^^ DONE WITH ^^~^ 


YES 






"^\^^LIN1 


c ^^ 
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SUBROUTINE 



TITLE: Unpack 

LABEL: UNPK 



PURPOSE 

UNPK is a BASIC X-RAY EXEC subroutine used to unpack teletype input 
arguments and convert them to binary. 

USAGE 



UNPK is called by the various X-RAY directive service routines that have 
teletype input arguments. Commas (,) must separate each argument. 
The arguments to be converted are taken from the XRAY input buffer. 
The converted arguments are stored in to array S. ARC, 

RESTRICTIONS 

UNPK is written for the 703 computer using SYM II assembly language. 







f 


SUBROUTINE UNPK 






P«g« " 


1 




' 




/ SAVE \ 

(return 




LOAD CURRENT 
BUFFER ADDRESS 












1 


■ 




set NUMBER OF 
ARGUMENTS COUNT- 
ER TO ZERO COMC 






<r DONE J> 


YES 




l| 








NO 
S.XBEG || 


CONSTRUCT FIRST 
WORD OF ARGU- 
MENTS ADDRESS 




COPY BUF ADDRESS 
TO XR AND LOAD 
NEXT CHAR 














1 




^^^ CHAR ^\^ 


YES 






^\^ = COMMA ^^ 








S. XUR i 




[no 




MOVE LAST WORD 




CONVERT CHAR 
TO BINARY 




II 




II 




RETURN 




STORE CHAR INTO 
CHAR WITH OTHERS 














\ 






S. COMMA 1 


1 








LOAD XR WITH 
ARGUMENT 
STORAGE ADDRESS 






w 






INCREMENT 
ARGUMENT COUNT 
BY I AND MOVE 
ARGUMENT 






u 






INCREMENT AND 
SAVE ARGUMENT 
STORAGE ADDRESS 






<f 






CLEAR 
S. CHAR 
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SUBROUTINE 



TITLE: Transfer 

LABEL: S. TRANS 



PURPOSE 

S. TRANS is a BASIC X-RAY EXEC subroutine used to process the T 
directive. 

USAGE 



S. TRANS is called by the main control program, XRAY, to process the 
transfer directive. There is one argument, LOC. If LOG is zero, the 
transfer is to a program whose beginning address is in RBEG (55 ,). If 
LOC is not zero, S. TRANS transfers to address LOC. 

RESTRICTIONS 

S. TRANS is written for the 703 computer using SYM II assembly language. 

Subroutine UNPK is called to unpack and convert LOC to binary. 
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SUBROUTINE 



TITLE: Output Absolute Paper Tape 

LABEL: PXCH 



PURPOSE 

PXCH is a BASIC X-RAY EXEC subroutine used to punch the contents of 
an area of memory onto paper tape. 

USAGE 



PXCH is called by the main control program XRAY to service the punch 
directive. There are two arguments input to PXCH; LOCI and LOC2. 
LOCI is the first memory location to punch on paper tape. LOC2 is the 
last. There is one halt in PXCH. This is executed before anything is 
punched to give the operator time to turn on the teletype punch. When 
the punch has been turned on, the operator should push the compute run 
button to continue. PXCH returns to X-RAY after the program has been 
punched. 

RESTRICTIONS 



PXCH is written for the 703 computer using SYM II assembly language. 

The paper tape output is punched on the teletype punch by the I/O Monitor 
subroutines OPEN, DOIO, and STAT. Subroutine UNPK is called to un- 
pack and convert LOCI and LOC2 to binary. 



SUBROUTINE S. TRANS 



P»ge 20 




UNPACK ARGUMENTS 



LOAD LOCATION 
TO TRANSFER TO 




YES 



CO TO 

4LOCATION) 

vlN RBEGy 



SUBROUTINE PXCH 



UNPACK ARGUMENTS 
JSX UNPK 



PUNCH 6" LEADER 
ON FRONT OF TAPE 
JSX DOIO 



PUNCH LOCATION 
OF PROGRAM 
JSX DOIO 



CALCULATE NO 
WORDS TO OUTPUT 



PUNCH PROGRAM 
JSX DOIO 



PUNCH MORE 
LEADER ON TAPE 
JSX DOIO 



/ GO TO \_ 
I XRAY T^ 



IF DEVICE WAS 
HIGH SPEED PUNCH 
TURN IT OFF 
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SUBROUTINE 



TITLE: Hexadecimal Correction 

LABEL: HX 



PURPOSE 

HX is a BASIC X-RAY EXEC subroutine used to store data into absolute 
memory addresses. 

USAGE 



HX is called by the main control program, XRAY, to process the H 
directive. The input format is shown below: 

H LOC,Dl,D2,D3,D4, 

LOC is the memory location to store data Dl. Data D2, E3, . . . is stored 
into consecutive memory locations following LOC. The maximum number 
of input characters is 54 -- this is counting the H through the last digit of 
the last data value and including the commas. If LOC is a negative num- 
ber, the memory location following the last data of the last H directive 
will be used for the initial location of the new data. The subroutine HX 
returns to XRAY after the operation is complete. 

RESTRICTIONS 



HX is written for the 703 computer using SYM II assembly language. 
Subroutine UNPK is used to unpack the input arguments. 
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SUBROUTINE HX 


1 ENTRY 1 




UNPACK ARGUMENTS 






JSX UNPK 
1 






RESET INPUT DATA 






LOCATION S.LOC 






1' 
LOAD STORAGE 






ADDRESS 






YES 








V^^^ MINUS ^> 






1 NO 






SET INTO STORAGE 








LOCATION S. DL 








HXCR 1 








LOAD DATA FROM 






ARGUMENT 
1 








INCREMENT 








LOCATION AND 








RESTORE 
1 








LOAD LOCATION TO 








STORE INTO 
1 








STORE DATA INTO 








MEMORY 

1 








. ._... , 




1 

INCREMENT 








LOAD NO OF DATA 




LOCATION AND 
RESTORE S. LL 












NO 












,^^^™^""s^f!yGo T?\ 






<^^^^^DONE^^^^> ^XRAY J 


— 1 
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SUBROUTINE 



TITLE: Blank Buffer 

LABEL: BB 



PURPOSE 

BB is a BASIC X-RAY EXEC subroutine that sets a constant into consecu- 
tive cells of memory. 

USAGE 



BB is called by the main control program, XRAY, to process the BB 
directive. There are three arguments: 

1. LOC is the initial address. 

2. DATA is the hex constant to be stored. 

3. NBR is the number of times to store DATA. 

After execution of the above BB directive locations LOC through LOC + 
NBR -1 would contain DATA. BB returns to XRAY after the operation is 
complete. 

RESTRICTIONS 

BB is written for the 703 computer using SYM II assembly language. 

Subroutine UNPK is called to unpack and convert LOC, DATA, and NBR 
to binary. 
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SUBROUTINE 



TITLE: Absolute Load 

LABEL: S. FILL 



PURPOSE 

S. FILL is a BASIC X-RAY EXEC subroutine used to load an absolute 
program from paper tapej 

USAGE 



S. FILL is called by the main control program, XRAY, to service the AL 
directive. There are no arguments. The initial programi location is 
read from the first record on the paper tape. The program is then read 
into memory beginning at that location. When the program has been 
loaded, the computer will halt, giving the operator time to turn off the 
teletype reader. When he pushes the run button, S. FILL returns to XRAY. 

RESTRICTIONS 

S.FILL is written for the 703 computer using SYM II assembly language. 
It requires a paper tape reader for program input. 











SUBROUTINE BB 
[ ENTRY 1 


P»g«25 

^ •■■■ 




UNPACK ARGUMENTS 
JSX UNPK 




1 


'■■ 


LOAD XR WITH 
STORAGE ADD 












■ '' 




LOAD DATA AND 
STORE 




i 




SUBTRACT 1 FROM 
NO OF TIMES TO 
STORE 










( GOTO 
SUBROUTINE S. FILL 




INCREMENT XR 


■ NO 












OPEN INPUT FIOT 
ON LUN BIN 




1 




READ PROGRAM 
LOCATION FROM 
RECORD 1 OF PAPER 
TAPE JSX DOIO 




'r 




MOVE LOCATION TO 
FIOT 




If 




READ PROGRAM 
FROM PAPER TAPE 
JSX DOIO 










( GO TO \ 
V XRAY J 
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SUBROUTINE 



TITLE: Convert Binary Data to Teletype Characters 

LABEL: S. PACK 



PURPOSE 

S. PACK is a BASIC X-RAY EXEC subroutine used by DUMP to convert 
binary data to teletype characters. 

USAGE 



The data to be converted is input in the AC register and output in S. SAVEl 
and S. SAVE2. Only one number is converted with each call to S. PACK. 

RESTRICTIONS 

S. PACK is written for the 703 computer, using SYM II assembly language. 



P«g« 2T 



SUBROUTINE S.PACK 




S.XPND 



SEPARATE INTO 
TWO CHARS 




YES 



RETURN 



CIRCULAR SHIFT 
WORD 8 PLACES 




ADD 7 



ADD B 



r 

ENTRY 



SAVE RETURN 



SAVE WORD 
TO CONVERT 



JSX S.XPND 



SAVE RESULT 



LOAD OTHER 
TWO CHARS 



JSX S.XPND 



SAVE RESULT 



RETURN 



jAv.^.-. 



RAYTHEON 
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